object MyExport: TMyExport Left = 323 Top = 107 BorderStyle = bsDialog Caption = 'Export' ClientHeight = 353 ClientWidth = 190 Font.Color = clBlack Font.Height = -17 Font.Name = 'Arial' Font.Style = [] PixelsPerInch = 120 Position = poScreenCenter Scaled = False OnShow = FormShow TextHeight = 19 object ListBox1: TListBox Left = 8 Top = 40 Width = 173 Height = 281 ExtendedSelect = False ItemHeight = 19 MultiSelect = True Sorted = True TabOrder = 1 end object SaveFile: TButton Left = 8 Top = 4 Width = 81 Height = 29 Caption = '&Save File' TabOrder = 0 OnClick = SaveFileClick end object ExitButton: TButton Left = 100 Top = 4 Width = 81 Height = 29 Caption = '&Exit' TabOrder = 4 OnClick = ExitButtonClick end object SelectAll: TButton Left = 8 Top = 324 Width = 81 Height = 25 Caption = 'Select &All' Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 2 OnClick = SelectAllClick end object Clear: TButton Left = 100 Top = 324 Width = 81 Height = 25 Caption = 'C&lear' Font.Color = clBlack Font.Height = -15 Font.Name = 'Arial' Font.Style = [] ParentFont = False TabOrder = 3 OnClick = ClearClick end object MySaveDialog: TSaveDialog DefaultExt = 'txt' Filter = 'text (*.txt)|*.txt' Title = 'Save Word List' Left = 4 Top = 296 end end